home *** CD-ROM | disk | FTP | other *** search
- COMMON /TABLES/ PROCED_NAME(MAXPRO),
- & PROCED_DESCRIP(MAXPRO),
- & PROCED_DOIF(MAXPRO,MAXCALL),
- & COMMON_NAME(MAXCOM),
- & COMMON_USED(MAXPRO,MAXCOM)
- COMMON /TABLE1/ NPROC,NCOMM,
- & PROCED_EXTERN(MAXPRO),
- & PROCED_NCALLS(MAXPRO),
- & PROCED_CALLS(MAXPRO,MAXCALL),
- & PROCED_NCALLEDBY(MAXPRO),
- & PROCED_LEVEL(MAXPRO),
- & PROCED_DONE(MAXPRO)
- CHARACTER*(MXNAM) PROCED_NAME
- CHARACTER*(MXNAM) COMMON_NAME
- CHARACTER*(LCDOIF) PROCED_DOIF
- CHARACTER*(LCMMNT) PROCED_DESCRIP
- CHARACTER*1 COMMON_USED
- INTEGER NPROC,NCOMM,PROCED_NCALLS,PROCED_CALLS,PROCED_NCALLEDBY
- INTEGER PROCED_CALLEDBY,PROCED_LEVEL
- LOGICAL PROCED_DONE,PROCED_EXTERN
-